home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / CDTools / S / RunSearch.awebrx < prev    next >
Text File  |  2000-12-02  |  379b  |  16 lines

  1. /*
  2.     $VER: RunSearch.awebrx 1.2 (2.12.2000) (c) Neil Bothwick, Wirenet
  3.     Run the SearchCD program from a page in AWeb
  4.  
  5.     1.2  - Uses "parse source" to get the name of the CD
  6. */
  7.  
  8. parse source . ' ' . ' ' . ' ' ScriptName ' ' .
  9. CDName = left(ScriptName, pos(':', ScriptName) - 1)
  10.  
  11. call pragma('D',CDName':')
  12. call pragma('S',16384)
  13.  
  14. address command 'MUIRexx SearchCDs port SEARCHCDS'
  15.  
  16.